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ABSTRACT 

The Report Generation (REPGEN) capability comprises a set of pro¬ 
grams designed to run on an IBM 1410 computer under the Air Force Inte¬ 
grated Command and Control System (AFICCS). The primary purpose of 
REPGEN is to provide a capability for producing a printed report from a 
file of input data contained on punched cards, magnetic tape or on the system 
disk. This document contains detailed information regarding the structure 
and operation of the REPGEN programs, including table descriptions, core 
maps, program flow-charts and abstracts. 
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SECTION I 


INTRODUCTION 


The purpose of this document is to present detailed information 
regarding the structure and operation of the various programs which 
comprise the REPGEN capability. It is assumed that the reader is 
familiar with the contents of the REPGEN User's Guide. 
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SECTION II 


OVERVIEW 


The Report Generation (REPGEN) capability comprises a set of 
programs designed to run on an IBM 1410 computer under the standard 
AFICCS system. The primary,purpose of REPGEN is to provide a capability 
for producing a printed report from a file of input data contained on 
punched cards, on magnetic tape or on the system disk. The output may 
be optionally on magnetic tape or cards. The output format is con¬ 
trolled by use of a quasi-English language of limited vocabulary. 

There are three major activities required in order to move 
from source data to finished report. These are: 

a. Table generation 

b. File generation 

c. Report production 

Figure 1 shows the basic elements involved in each of these activities. 
TABLE GENERATION 

Before a report can be generated, certain basic informa¬ 
tion must be loaded into tables and placed on the system disk, to 
be available for File generation and Report production. The total 
REPGEN capability includes a number of support programs which are 
used to perform the necessary table construction. 

LID (Load Input Descriptors) 

The input to LID is primarily a description of the source 
data which will be used to make up the serial file tape (SF tape) 
which in turn will be the input to the output phase of REPGEN. The 
various source data record types must identified, and the data 
attributes associated with each record type must be defined in terms 
of length, position within the record, data type, etc. 

SAVER 


In some cases, the source data may reside on the AFICCS 
system disk in parallel file form. In order to produce a serial 
file tape (SF Tape) which can be used by REPGEN output programs, a 
Query Language retrieval must be performed against the parallel file. 
The Query Language retrieval statement must specify GETTAC as the 
propess director. GETTAC (a variant of GETB) outputs the retrieved 
data on an SF Tape. 
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Figure 1. Overviev^ of the Report Generation Process 
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SAVER*s primary function is to save a Query Language 
retrieval statement so that it may be called up for execution when 
required. (SAVER is a variant of SAVE.) 

LEGVAL (Legitimate Value Loader) 


As information is transferred from source data to the 
serial file tape, it may be desirable to check certain attributes 
for legality. This best applies to attributes which can legally 
take on one of a limited number of values. 

LEGVAL produces a table which contains all of the allowable 
values for each attribute which is to be legality checked. 

LOP (Load Output Descriptors) 

A quasi-English language of limited vocabulary has 
been implemented to give the user the capability to structure a 
report. Using the language provided, data can be selected from the 
serial file tape, arithmetically manipulated, and arranged for 
presentation on a printed page- (Output may optionally be to 
magnetic tape or punched cards.) The set of statements which direct 
this activity may be called an Output Program . 

An output program is initially processed by LOD, which 
performs syntax checking, and then eliminates all redundant characters 
in each statement. LOD also replaces attribute names with their 
length and position on the serial file tape. The resulting condensed 
output program is placed in a table on the system disk, to be 
available for 1ater execution- 

FILE GENERATION 

The purpose of the file generation activity is to produce 
a serial file tape containing the data from which the desired report(^) 
will be generated. The source data from which the serial file tape is 
made may be in punched cards, on magnetic tape, or may reside on the 
system disk in parallel file form- 

When the source data is in cards or on tape, we are 
said to be operating in Mode 1 ; when the source data is a parallel 
file on disk, we are operating in Mode 2. There are internal 
differences in the operation of the file generation program (REPGEN), 
depending upon the mode in which it runs. The end result, however, 
is essentially the same; a serial file tape is produced which contains 
the data to be used in generating the desired report(s). 
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REPORT PRODUCTION 


Once the required tables have been generated and a 
serial file tape has been prepared, we are ready to produce a 
report. This is accomplished by operating what is called the Output 
Phase. 


The output phase can proceed as a continuation of a 
file generation run; at the completion of file generation the 
computer operator is given the option to terminate or to continue 
with the output phase. 

A serial file tape which was produced by a previous 
run can be used to generate a report by operating the output phase 
via the Bypass Mode. In this mode, file generation is bypassed and 
the output phase is immediately started. 

During the output phase, the condensed output program 
is read from disk and the statements are interpreted and executed 
to produce the desired output. Up to nine additional copies of a 
printed report may be produced automatically. 
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SECTION Ill 


TABLES 


REPORT DESCRIPTOR TABLE 


Created By: 
Purpose: 

Table Size: 
Entry Size: 
End of Table: 


LID 

Each entry in this table identifies by name and number 
an active REPGEN report. 

1 record (expandable) of 2800 characters• 

100 characters per entry, recorded in Move mode. 

A record mark in the first position of an entry 
indie at es the end of the t able. 


Entry Description: 

Positions Contents 


1-3 

A-15 

16 

17 

18-47 

48-49 

50-52 

53-68 

69 

70 

71 

72 

73 

74-76 

77-80 

81-84 

85-88 

89-92 

93-96 

97-100 


Report Number 

Report Title 

Input Media 

Classification 

Header Label 

Size of Header Label 

Low Order Position of Header Label 

B1 ank 

Card Indicator 
Tape Indicator 
Printer Indicator 
Not Used 

History Indicator 

Save Statement Number 

Low Order Position of OEDT 

SDA of Selected Output Table 

SDA of Record Descriptor Table 

Number Records for Record Desc. Table 

SDA of Output Entry Desc. Table 

Number Records for OEDT 
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RECORD DESCRIPTOR TABLE 


Created By: LID 

Purpose: Each entry describes a particular type of input record 

which may be encountered during generation of a Serial 
File Tape. 

Table Size: 1 record of 2800 characters allocated for each entry 

in the Report Descriptor Table. 


Entry Size: 40 characters per entry, recorded in Move mode. 

End of Table: A record mark in the first position of an entry 
indicates the end of the table. 

Entry Description: 

Positions Contents 


1-5 

Record Type 

6-8 

Low Order Position of Record Type 

9 

Length of Record Type 

10 

Input Media 

11-12 

Maximum Number Records per Entry 

13 

Number of Control Attributes 

14 

Number of Sub-Control Attributes 

15-17 

High Order Position of Remark Text 

18-20 

Low Order Position of Remark Text 

21-32 

B1 ank 

33-36 

SDA of Attribute Desc Table 

37-40 

Number Records for Attribute Desc 
Table 
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ATTRIBUTE DESCRIPTOR TABLE 


Created By: LID 

Purpose: Each Attribute Descriptor Table describes all of the 

attributes associated with a particular record type. 

Table Size: 1 or more 2800 character records (sufficient to describe 

all attriubtes pertaining to a given record type). 


Entry Size: 40 characters per entry, recorded in Move mode. 

End of Table: A record mark in the first position of an entry 
indicates the end of the table. 

Entry Description: 

Positions Contents 


1-17 

Attribute Name 

18-19 

Length of Attribute 

20-22 

Low Order Position of Attribute 

23 

Data Class 

24 

Audit Check Indicator 

25 

Mandatory Value Indicator 

26-30 

Record Type 

31 

Type of Attribute 

32-36 

Blank 

37-39 

Low Order Position of the Attribute 
Value in the Output Entry File 

40 

Not Used 
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SELECTED OUTPUT TABLE (SOT) 

N 

Created By: LID. The space is allocated by LID, but table entries 

are actually loaded by LOD. 

Purpose: Each SOT table acts as a directory for up to seven 

output programs which may be associated with a given 
report number. 


Table Size: 1 record of 245 characters (only the first 210 character^ 

are actually used) is allocated for each entry in the 
Report Descriptor Table. 


Entry Size: 30 characters per entry, recorded in Move mode. 


End of Table: A record mark in the first position of an entry indicates 
the end of the table- 


Entry Description: 

Positions 


Content s 


1 

2-5 

6 

7-10 

11 

12-14 

15-16 

17-21 

22-26 

27 


28-30 


Entry Indicator 

SDA of Condensed Output Format 
Statement s 
Output Media 

Output Entry Size for this Report 
History Tape Indicator 
Highest Statement Number for this 
Output Program 

Total Output Statements Fitting into 

Core with this Format 

Cote Origin of Output Statements 

for this Output Format 

Core Origin of Input Area for this 

Output Format 

Usually Blank. Set to 1 by UPSTAT 
to indicate that the condensed 
statements to which this SOT entry 
points have been fully condensed 
by UPSTAT. 

Blank 
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OUTPUT ENTRY DESCRIPTOR TABLE (OEDT) 


Created By: 
Purpose: 

Table Size: 
Entry Size: 
End of Table: 


LID 

This table describes the format of the records on 
the Serial File Tape. 

1 record of 2800 characters. 

25 characters per entry, written in Move mode. 

A record mark in the first position of an entry 
indicates the end of the table. 


Entry Description: 

Positions 


Contents 


1-17 

18 

19-20 

21-23 

24-25 


Attribute Name 

"Zero'* inserted by LID 

Length of Attribute 

Low Order Position of Attribute 

Blank - Not Used 
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Figure 2. Tables Associated with One Report Descriptor Table Entry 
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LID Input and Output, Mode 1 
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LEGITIMATE VALUE ATTRIBUTE NAME TABLE 


Created By: LEGVAL 

Purpose: This table contains the name of every attribute to 

be checked for legality during file generation, and 
acts as a directory for the lists of legal values. 


Table Size: 10 records of 245 characters each. 


Entry Size’ 24 characters per entry, recorded in Move mode. 

End of Table: A record mark in the first position of an entry 
indicates the end of the table. 


Entry Description: 

Positions Contents 

1-17 Attribute Name 

18-21 SDA of Legitimate Values for this 

Attribute, 

22 Number of records assigned to 

above SDA, 

23-24 Maximum length of attribute value. 
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LEGITIMATE VALUE TABLE 


Created By: 

LEGVAL 

Purpose: 

Each Legitimate Value Table contains the list of all 
allowable values for one particular attribute. 

Table Size: 

4 records of 245 characters each. 

Entry Size: 

Variable. The entries in a given Legitimate Value 
Table are as long as the maximum length of that 
particular attribute value. 

End of Table; 

A record mark in the first position of an entry 
indicates the end of the table. 
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CONDENSED OUTPUT PROGRAM 


Created By: 

LOD 

1 

Purpose: 

Each table contains one Output Program, processed 
and condensed by LOD and aivailable for execution. 

Table Size: 

The table contains one 245 character record for each 
statement of the Output Program (only the first 200 
characters of each record are actually available for 
use). 

Entry Size: 

Each entry (condensed statement) is contained in a 

245 character record written in Move mode. 

End of Table: 

Each condensed statement is assigned within an SDA 
to the relative record corresponding to the statement 
number. Thus, the last entry in the table is contained 
in the relative record corresponding to the highest 
statement number used in the Output Program. 


Entry Description: 

See program description of LOD. 
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SAVED STATEMENT TABLE DIRECTORY 


Created By: SAVER 


Purpose: This table serves as a directory for locating the 

Query Language statements which have been stored on 
the system disk by SAVER. 

Table Size: 1 record of 2800 characters (only the first 2000 are 

used). 


Entry Size: Each entry is 4 characters in length. 

End of Table: The end of the table is indicated by the 500th entry 
or a blank entry, whichever occurs first. 


Entry Description: 

Each entry is an SDA of a saved Query Language 
statement. The relative position of the entry in the 
table corresponds to the statement number previously 
assigned to the saved statement. 
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SAVED STATEMENT TABLE 


Created By: 

SAVER 

Purpose: 

Query Language retrieval statements are stored on 
the system disk for subsequent recall and execution. 

Table Size: 

A maximum of 500 2800 character records. 

Entry Size: 

Each saved statement is contained in one 2800 
character record. 


Entry Description: 

See program description for SAVER. 
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Figure 6. SAVER Input and Output 
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I/O COMMUNICATION RECORD 


Created By: REPGEN (or by RGPBYP when using bypass mode). 

Purpose: This record contains information which must be passed 

from the input phase to the output phase. 

Table Size* 1 record of 245 characters. 

Entry Size; 1 entry of 126 characters. 


Entry Description: 

Positions 


Contents 


1-100 

101-117 

118-120 

121-123 

124 

125 

126 


Report Descriptor Table entry for 
report being processed. 

AS QF TIME entered on console 
High order position of Remarks text 
Low order position of Remarks text 
Format number of requested Output 
Program 

Classification code of requested 
report 

Number of additional copies requested 
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SECTION IV 


OUTPUT PHASE COMMUNICATION ZONE 


Name 

Log 

Length 

Tag 

Meaning 

WAREA 

2500 

200 

High 

Area from which a condensed 
statement is executed. 

ENTIND 

2700 

1 

Low 

Indicator for entry from SOT to 
be used. A or C ^ active; D or E 
or )6 = inactive. 

ENDSDA 

2704 

4 

Low 

SDA of condensed statements for 
this Output Program. 

ENTMED 

2705 

1 

Low 

Output device for this Output 
Program. C = card punch, T = 
tape, P = printer. 

ENTSIZ 

2709 

4 

Low 

Size of the output image for this 
Output Program. 

ENTHIS 

2710 

1 

Low 

History tape indicator. Y = yes, 
yJ = no. 

ENTHIH 

2713 

3 

Low 

Highest statement number for this 
condensed Output Program. 

ENTAMT 

2715 

2 

Low 

Number of condensed statements 
that can fit in core for this 
Output Program. 

ENTSTA 

2720 

5 

Low 

Core Origin of the condensed 
statements for this Output Program 

ENTINP 

2725 

5 

Low 

Core origin of the input area 
for this Output Program. 

ENTRY 

2729 

4 

Low 

The low-order character of the 

SOT entry in use. 

SOT 

2730 

245 

High 

Selected Output Table for this 
report. 

OVFLOW 

2976 

2 

Low 

The line after which overflow 
is to occur. 

COUNTR 

2977 

51 X 17 

High 

The 50 Counters available to an 
Output Program, plus the 

REMAINDER Counter (Counter 0). 
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Name 

Loc 

Length 

Tag 

Meaning 

ASFDAT 

3860 

17 

Low 

Location where AS OF TIME from 
console is stored. 

DATE 

3877 

17 

Low 

Location where system date is 
stored (referred to by system 
attribute name TODAY). 

CLASS 

3894 

17 

Low 

Report classification. 

SWITCH 

3895 

10 

High 

The 9 Switches available to an 
Output Program. 

LNCTER 

3906 

2 

Low 

Line counter. 

COMING 

3909 

3 

Low 

The statement number of the 
first level statement in operation 

COMIPO 

3914 

5 

Low 

The position in the first level 
statement in operation. 

COMIAC 

3915 

1 

Low 

First level active indicator; 

] = active; 0 = inactive. 

COM2 NO 

3918 

3 

Low 

The statement number of the 
second level statement in 
operation. 

COM2PO 

3923 

5 

Low 

The position in the second level 
phrase in operation. 

COM2AC 

3924 

1 

Low 

Second level active indicator; 

1 = active; 0 = inactive. 

COMREP 

3927 

3 

Low 

The statement number of the REPEAT 
statement in operation. 

COMSOR 

3932 

5 

Low 

The core origin of the condensed 
statements. 

COMSNO 

3934 

2 

Low 

The number of statements in core. 

COMIOR 

3939 

5 

Low 

The core origin of the input area. 

COMIEN 

3944 

5 

Low 

The end of the input area in core. 

COMOOR 

3949 

5 

Low 

The core origin of the output area 
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Name 

Log 

Length 

Tag 

Meaning 

COMOEN 

3954 

5 

Low 

The end of the output area in 
core, 

COMTES 

3955 

1 

Low 

The result of the last IF test; 

1 = true; 0 = false. 

COMPUN 

3956 

1 

Low 

The punctuation from the last 
phrase passed. 

COMDON 

3957 

1 

Low 

Finished indicator; 1 = no more 
input data. 

COMSTK 

3958 

1 

Low 

The stacker into which the next 
card to be punched will be placed 

COMQL 

3959 

1 

Low 

Query Language indicator. 

Non blank = Query Language, 

COMTYP 

3960 

1 

Low 

The statement type of the last 
statement operated. 

COMDR 

3961 

1 

Low 

Type of first-level statement 
last executed; D = DO; R = REPEAT 

COMOVF 

3962 

1 

Low 

Overflow indicator. 

HILO 

3968 

6 

Low 

The high and low order addresses 
of remarks data on remarks card. 

COMNEW 

3969 

1 

Low 

Indicator that a new statement 
has become active. 

COPIES 

3970 

1 

Low 

Number of additiona1 copies of 
the report requested. 

NEWPAG 

3971 

1 

Low 

Indicator that a SKIP TO NEW PAGE 
was executed. 

SPACES 

3973 

2 

Low 

Number of blank lines printed by 
the last SKIP statement. 

WRTSCT 

3975 

2 

Low 

Not used. 
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SECTION V 


SYMBOLIC DISK ADDRESSES 


The REPGEN programs make frequent use of the system disk. All 
disk references are made through the use of DSKACC, using Symbolic Disk 
Addresses (SDA*s). Several programs in REPGEN use the system allocation 
routine DSKALL to dynamically obtain needed SDA's. However, there are 
a number of SDA*s which must be obtained prior to installing the REPGEN 
capability. These SDA * s are assembled directly into some of the REPGEN 
programs. 

Table 1 which follows describes the characteristics of the disk 
areas for which SDA*s must be obtained prior to installing REPGEN. 
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SECTION VI 


repgen flowcharts and abstracts 


6.1 LID 
Purpose 


LID reads a deck of input descriptor cards and generates 
a set of tables which are required by subsequent REPGEN programs. 

Calling Sequence 

Enter LID on the console typewriter. Return will always 

be to IDLOOP. 

Description 


There are four acceptable input card types to LID. They 
are the Report Descriptor Card, the Record Descriptor Card, the Attri¬ 
bute Descriptor Card and the END Card. 

Report Descriptor Card -- When LID reads a Report Descriptor 
Card it does the following: 

a. Checks the Report Descriptor Table to make sure there 
is an open slot or that this is not a duplicate of another report number. 

b. If the input medium declared on this card is not disk, 
an SDA is allocated for a Record Descriptor Table. 

c. An SDA is allocated for an SOT. 

d. An SDA is allocated for an OEDT. 

Record Descriptor Card -- When LID encounters a Record 
Descriptor Card it: 

a. Allocates an SDA for an Attribute Descriptor Table. 

Attribute Descriptor Card -- An Attribute Descriptor 
Card causes LID to: 

a. Make an entry in the current Attribute Descriptor 

Table. 

b. Read the next Attribute Descriptor Card and repeat 
the process until all attributes for this record type have been treated. 

c. Make an entry in the Record Descriptor Table. 


28 








END Card (or next Report Descriptor Card)-- When an END 
Card is read, LID will: 

a. Construct an Output Entry Descriptor Table (OEDT) 
to describe the format of each record as it will later appear on the 
Serial File Tape. 

b. Modify each Attribute Descriptor Table entry to 
include data identifying the attribute's assigned position in the Serial 
File Tape records. 

c. The modified Report Descriptor Table (and Record 
Descriptor Table if input is not disk) is written onto the system disk. 
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LEGVAL 


Purpose 


To generate a disk table containing all allowable values 
for one or more attributes. This, table is to be used during the file 
generation process which creates a Serial File Tape from source input 
data. 

Calling Sequence 


Enter LEGVAL on the console typewriter. 


Description 


Each input card to LEGVAL contains the name of an attribute 
and one of the allowable values for that attribute. LEGVAL checks to 
see if that attribute name has been previously encountered. If not, 
the name is added to a list of attributes which are to be legality 
checked. After the name has been added to the name list, an SDA is 
allocated to be used for storing the list of legal values pertaining 
to the attribute. When all allowable values for a given attribute have 
been read, the value table is written on the system disk. When an END 
card is read, the name list is written on the system disk. 
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SAVER 


Purpose 


A query language statement containing the GhTTAC process 
director and report number(s) is stored on disk for utilization by t lit* 
query portion of the report generation program. 

Calling Sequence 

From* 1/0 typewriter, or cards with sense switch B on, 
starting in column 1. 

SAVER)6GETTAC)[iAAAA* ’ 'AA[BBB/BBB’ ' ' ] 

XXX+XXX+' ' '-FXXX 


AA’’’ = qualifying attributes 

BB’’' = output selector 

XXX = report numbers (maximum of 10) 


Description 


The 

first blank entry 
accessed from the 
correctness, such 


saved statement SDA table is read from disk. The 
is located and noted. The statement to be saved is 
buffer SDA '0003*. The statement is scanned for 
as appearance of a left and right bracket and report 
numbers. The report numbers are stored in a small table area. The 
output selectors are stored in a table area 50 characters to each entry 
The report descriptor file is now accessed. Report numbers are nov; 
matched from the report descriptor file with those of the saved state¬ 
ment. If a match is found the saved statement number is inserted in 
the appropriate slot of the report descriptor file. The output entry 
descriptor table SDA and number of records referenced by the report 
descriptor is saved in a table area. The new report descriptor is 
written back on system disk. The process is continued until all report 
numbers from the saved statement are exhausted. 


The output selector table is now written on disk at the 
SDA's indicated by the matching reports discovered. Disk space is 
allocated for the saved statement and the statement is saved at the 
SDA allocated. The actual SDA for the statement is inserted in the SDA 
statement buffer and rewritten on the system disk. The program will 
terminate with a printout of the statement number assigned to the 
'SAVER’ statement. 
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LOD 

Purpose 


LOD processes an Output Program, checking the output 
format statements syntactically, and condensing them into a convenient 
form for interpretation and execution by the output phase of REPGEN. 

Calling Sequence 

Enter LOD on the console typewriter. Return will be to 

IDLOOP. 

Description 


The Output Descriptor Card is read and Report Descriptor 
Table is called from disk. A search is instituted for the report 
indicated on the Output Descriptor Card. 

When the report is found, the SOT Table for this report 
is called in from disk and updated with the current information from 
the Output Descriptor Card. An SDA is now allocated for the condensed 
output format statements. 

The SOT Table is now put back on disk with the present 
run recorded as in error status. The condensed output statement SDA 
is put into the appropriate DSKACC call. 

The LOD statement cards are read in next and are condensed 
by LOD. Each numbered statement is allotted a complete 245 character 
record within the assigned SDA. When an attribute name is encountered 
during processing of the statement cards, an Output Entry Descriptor 
Table (OEDT -- an expandable 2800 character record) for this report is 
brought into core from disk. The attribute name is replaced by a six 
digit value from the OEDT. This value specifies the attribute value 
length and its relative position in the intermediate tape created by 
the first phase of REPGEN. 

The OEDT usually will remain in core throughout the 
processing of the present statement cards except when an additional 
segment of the OEDT has to be called in from disk. On the next refer¬ 
ence to the OEDT the first segment of the table will be brought back 
into core. 


When the final statement has been processed, the report 
descriptor table will be written back onto disk, after being submitted 
to a minor update. This update involves putting an indicator for 
output media into the table. 
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A second wind-up operation puts the updated SOT Table 
onto disk. A successful set of statements get an "A" or "C" in 
position 0 of the table. Otherwise an "E" is left in the table. 


Phrase Types and Condensed Form 

Type 1 


DO XXX IDXXX 
REPEAT XXX IRXXX 
GO TO XXX IGXXX 
CONTINUE XXX ICXXX 


Type 2 


SET OVERFLOW AFTER NN 2S0NN 

SET SWITCH N 2SSN 

SET COUNTER NN LENGTH=PP 2SCNNPP 

SET REMAINDER LENGTH=NN 2SC00NN 

CLEAR SWITCH N 2CSN 

CLEAR SWITCHES 2CS 

CLEAR COUNTER NN 2CCNN 

CLEAR COUNTERS 2CC 

CLEAR 2 

Type 3 

SKIP TO A NEW PAGE 3E1 

SKIP NN 3CNN 

STACKER N 3SN 

WRITE TAPE MARK 3T 


Type 4 


END LINE 40 

END CARD 40 

END HEADER XXX 4HXXX 

END TRAILER XXX 4TXXX 

END ENTRY 40 

NEXT ENTRY 4 

END 1 

Type 5 

IF OVERFLOW 50 

IF FINISHED 5F 
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Type 5 (continued) 


IF SWITCH X 
N 

IF b (....)/ 

D 


Type 6 

N 

L S 

COL XXX „ - D (_) 

^ C 
b 

COL XXX - g (_) 


D 

COL XXX = C (_) 

b 


5SX 

N 
5 b 
D 



N 
L S 

6XXX _ D .... 
^ C 
b 


N 

6XXXR g 


D 

6XXXL C 
b 


• • • • 


• • • • 


•f 

T N N - N 

COL XXX “= 3 (^(....) ^ I (....)) 

X 


6XXX ^ 
R 


N 

S N 
b 



N N 

COL XXX = g 



6XXXR 


N N 
S b 


A 

S N 
( b 


X 


N 

COUNTER XX = D (_) 

b 


N 

6CXX D . . .. 
b 


COUNTER XX 


N 

S 




6CXX 


N N 
S b 


A 

S N 
•( b 
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REPGEN 


Purpose 


REPGEN is operated to produce a Serial File Tape from a 
source data file contained on cards, magnetic tape or on the system 
disk. The Serial File Tape is then used as input to the output phase 
of the Report Generation capability. 

Calling Sequence 

Enter on the console typewriter 

REPGENrrrfcn 

where rrr = 3~digit report number (no blanks) 

f = Format number of the Output Program to be executed. 

Must be 1-7 or blank. 

c = Classification code: U, C, S or T for Unclassified, 
Confidential, Secret or Top Secret. 

n = Number of copies of printed output. Must be 1-9 or blank 

Final return will be made to IDLOOP. 

Description 


The Report Descriptor Table is read from disk and the 
data from the typewriter call is stored away. If no report number was 
given with the call, the PRTTND routine is operated, printing an index 
of REPGEN reports followed by a return to IDLOOP. 

If the report number was not blank, the requested report 
is located in the Report Descriptor Table, mount messages are issued 
and the input medium is checked. 

If the input medium is disk the saved Query Language 
statement number is taken from the Report Descriptor Table entry and 
used to construct a dummy call to REPEET. REPEET is called via COPS; 
it fetches the Query Language statement, types it on the console and 
passes control to GETTAC. GETTAC executes the Query Language statement 
placing the retrieved data on a Serial File Tape. The option is now 
given to the operator to enter the output phase or to terminate, 

If the input medium is not disk, the Record Descriptor 
Table is brought in from disk and a source data record (either card 
or tape) is read. Entries in the Record Descriptor Table are examined 
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against the input record until the record type is identified, at which 
time the Attribute Descriptor Table for this record type is read into 
core. 


All control attributes are collected into a control 
field for this input record. Sub-control attributes are collected 
into a sub-control field. 

The control field is compared with the previous control 
field. If they differ, a control break is noted. If the sub-control 
field differs from the previous sub-control field, a sub-control break 
is noted. If the current record caused no control or sub-control break, 
the record is given at once to the audit routine. 

The audit routine processes each attribute of the input 
record separately, performing left or right justification and legality 
checks as required or specified. Each attribute, after it is audited, 
results in an entry in the DAWORK Table. The entry in DAWORK specifies 
the location of the attribute in the input area, its destination in 
the output area, and its length. If the input record contained sub¬ 
control attributes, a similar entry is made in the DAW0R2 table. After 
all input attributes for the current record have been audited, the 
DAWORK table is used to move the audited fields from the input area 
to the output buffer. The next input record is then read. 

At the point where control and sub-control fields were 
checked with previous fields, if a control break or sub-control break 
was noted the current contents of the output buffer will be written 
on the Serial File Tape. If a control break occurred, the entire 
output image is then cleared. If a sub-control break occurred, the 
DAW0R2 table is used to determine those fields to selectively clear 
in the output image. After the output image is cleared, the current 
input record is given to the audit routine, and processing continues 
as described before. 

When the input data file has been fully processed and 
the Serial File Tape is complete, a disk record called the I/O Communi¬ 
cation Record is written, containing the current Report Descriptor 
Table entry and various typewriter inputs (e.g., Report Classification 
Code, Format Number, AS OF TIME) to be passed a long to the output phase. 
The operator is given a typewriter option to cancel or to continue into 
the output phase. If the output phase is requested, a dummy call is 
set up to RGPBYP, Control will eventually be returned from the output 
phase to REPGEN which will exit to IDLOOP. 
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RGPBYP 


Purpose 


This routine issues mount messages for the output phase, 
completes the I/O Communication Record and calls in the output phase. 

Calling Sequence 

If called internally from REPGEN, the dummy typewriter 
call which is constructed is 


RGPBYP*** 


If called externally, enter on the console typewriter 
RGPBYPrrrfcn 


where rrr = 3-digit report number (no blanks) 


f = Format number of the Output Program to be executed. 
Must be 1-7 or blank. 


c 5= Classification code: U, C, S or T for Unclassified, 
Confidential, Secret or Top Secret, 

n = Number of copies of printed output. Must be 1-9 or blank. 

Final return is to calling program. 


Description 


If RGPBYP was called from REPGEN, the I/O Communication 
Record is read back from disk. If RGPBYP was externally called, the 
AS OF TIME is requested, and an l/O Communication Record is constructed. 


The SOT Table for the requested report is accessed and 
used to determine the output devices required and the mount messages 
to be issued. Requests for multiple copies are ignored if the output 
device is not the printer. 


After the mount messages are issued, the I/O Communi¬ 
cation Record is completed and written on the system disk. The output 
program RGPOUT is then called via COPS. After return is made from 
RGPOUT, RGPBYP will exit to its calling program. 
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RGPOUT 


Purpose 


RGPOUT acts as the output phase supervisor, controlling 
the loading and execution of the various output phase programs. 

Calling Sequence 

RGPOUT is called internally from RGPBYP as follows: 

B COPS 
DCW 'RGPOUl' 


Description 


The Read/Write Tape routine RWTAPE, the CONSOLE routine 
and the initial Communication Zone are all assembled with RGPOUT, and 
are loaded into core when RGPOUT is loaded. They remain in core through¬ 
out the output phase. 

RGPOUT calls the output phase initialization routine 
ININT into core and executes it. Next the SOT Table entry for the 
output program to be executed is examined. If input was via Query 
Language, the SOT entry is checked to see if UPSTAT has been executed 
for this output program. 

If input was via Query Language and UPSTAT has not been 
executed, UPSTAT is loaded and executed to complete the condensing of 
the output program. 

The appropriate output routine, PRINTO, CARDO or TAPEO, 
is loaded depending upon whether the output device is the printer, the 
card punch or magnetic tape. The main output program REALO is loaded 
and executed to produce the desired output. 

After REALO executes the output program, RGPOUT checks 
to see if any more formats were requested for this report. If so, 
the appropriate output program is loaded, REALO is loaded, and the 
next output program is executed 

When all requested output programs have been executed, 
RGPOUT checks to see if extra copies of printed reports were requested. 

If so, the extra copies tape is rewound and an internal call to PRTTAP 
is set up and executed to yield the necessary printed copies. 
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ININT 


Purpose 


Performs initialization for the output phase of REPGEN, 
Calling Sequence 

ININT is called from RGPOUT by 
B ININT 
(Normal Return) 


Description 


ININT reads the I/O Communication Record from disk. 

The classification code is checked for U, C, S or T and causes the 
system attribute CLASS to be set to Unclassified, Confidential, Secret 
or Top Secrete Other data is taken from the I/O Communication Record 
and entered into the Communication Zone. The SOT Table is read into 
the Cotnmunica' Ion Zone, If only one specific format was requested, 
all other entries in the SOT Table are set to blanks. The Communica¬ 
tion Zone is written on the disk from where it may be read back to 
re-initialize it between execution of output programs. 

Return is made to RGPOUT. 
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UPSTAT 


Purpose 


UPSTAT is called by RGPOUT to complete the condensing 
of output statements which LOD could not completely condense. This 
only occurs in the case where the Serial File Tape Is the product of 
a Query Language retrieval from a parallel file stored on system 
disk. 

Calling Sequence 


UPSTAT is called from RGPOUT by 

B UPSTAT 
(Normal Return) 


Description 


When LOD condenses the statements of an output pro¬ 
gram which uses a Query Language generated Serial File Tape as input, 
the statements cannot be completely condensed. In particular, LOD 
does not know the length or position in the Serial File Tape records 
of each attribute. LOD does know the order in which the attributes 
will appear on the Serial File Tape. In the case in point, LOD 
assigns each attribute a number corresponding to its relative posi¬ 
tion in the Serial File Tape records, and substitutes this number 
for each occurrence of an attribute name in an output statement. 

When UPSTAT is executed, it reads the first record of 
the Serial File Tape and uses it to construct a table. The table so 
constructed contains the length and relative position on the Serial 
File Tape of each attribute. The condensed output program is read 
from disk, and the attribute numbers are now replaced with length 
and' position data from the table. The fully condensed statements 
are written back onto disk, the **UPSTAT executed" indicator is set 
in the appropriate SOT entry, and return is made to RGPOUT. 
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PRINTO 


Purpose 


Print a line on the printer or read a record from 
the Serial File Tape. 

Calling Sequence 


PRINTO is entered from the REAID program. If a 
record is to be read from the Serial File Tape, the call is 


B INPUT 

(Normal return) 

If the output image is to be printed, the call is 

B OUTPUT 

(Normal return) 

Description 


If entry is made at INPUT, one record is read from 
the Serial File Tape. If an end-of-file is encountered, the indi¬ 
cator COMDON is turned on in the Communications Zone. 

If entry is made at OUTPUT, the first 132 characters 
of the output image are printed. The line counter is incremented, 
and if it exceeds the value in OVFLOW, the overflow indicator is 
turned on. 


If additional copies of the printed report were 
requested, the print image is also written onto the extra copies 
tape. Three characters are added to the record on tape to indicate 
any blank lines or page ejects which should be accomplished before 
this line is printed. (This spacing information will be interpreted 
by the PRTTAP program which generates additional copies of the printed 
report from the extra copies tape.) 
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CARDO 


Purpose 


Punch a card from the output image or read a record from 
the Serial File Tape. 

Calling Sequence 

CARDO is entered from the REALO program. If a record is 
to be read from the Serial File Tape, the call is 

B INPUT 

(normal return) 

If a card is to be punched, the call is 

B OUTPUT 

(normal return) 


Description 


If entry is made at INPUT, one record is read from the 
Serial File Tape. If an end-of-file is encountered, the indicator 
COMDON is turned on in the Communications Zone. 

If entry is made at OUTPUT, a check is made to see if a 
history tape was requested. If a history tape was requested, the 
first entry at OUTPUT causes the history tape to be spaced until an 
end-of-file is detected, and then positioned so that records may be 
added to the file. The output image is then written on the history 
tape. 


If Sense Switch C is on, the output image is printed. 

Next the stacker select character is acquired from the 
Communication Zone, and the first 80 characters of the output image 
are punched in a card. 
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TAPED 


Purpose 


Write an output image onto magnetic tape, write a 
Header record on magnetic tape, write a Trailer record on magnetic 
tape or read a record from the Serial File Tape. 

Calling Sequence 

TAPED Is entered from the REALD program. If a record 
is to be read from the Serial File Tape, the call is 

B INPUT 
(normal return) 

If the output image is to be written on tape, the call is 

B DUTPUT 
(normal return) 

If a Header is to be written on tape, the call is 

B HEADER 
DCW 'NNN' 

where NNN is the number of characters of the output image to be 
used as a Header record. If a Trailer record is to be written on 
tape, the call is 

B TRAILER 
DCW ’NNN’ 

where NNN is the number of characters of the output image to be 
used as a Trailer record. 

Description 


If entry is made at INPUT, one record is read from the 
Serial File Tape. If an end-of-file is encountered, the indicator 
CDMDDN is turned on in the Communication Zone. 

If entry is made at DUTPUT, a check is made to see if 
a history tape was requested. If a history tape was requested, the 
first entry at DUTPUT causes the history tape to be Spaced until an 
end-of'file is detected, and then positioned so that records may be 
added to the file. The output image (up to 1000 characters) is 
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then written on the history tape. If Sense Switch C is on, the first 
132 characters of the output image are printed. The output image is 
then written on the output tape. 

If entry is made at HEADER, the Header indicator is 
turned on, the first NNN characters of the output image are written 
on the output tape, and are also saved on the system disk (if a 
subsequent entry at OUTPUT results in an end-of-reel condition 
on the output tape, the saved Header will be written as the first 
record of the next reel). 

If entry is made at TRAILER, the first NNN characters 
of the output image are written on the output tape. 
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REALO 


Purpose 

Interpretively execute an output program to produce 
the desired report. 

Calling Sequence 

REALO is called internally from RGPOUT by 

B CTl 
(normal return) 


Description 


Ap initialize routine is first executed to read into 
core as much of the condensed output program as will fit. Statements 
are kept in core just as they appeared on disk» in 245 character 
records. Each statement, as it is required, is moved to a buffer 
at WAREA from where it is actually executed. The current statement 
is examined one phrase at a time. Each phrase begins with a number 
from 1 to 6 indicating the phrase type. Recognition of the type 
causes a transfer to the appropriate TYPE routine, where the phrase 
is completely identified and executed. Section 6.4.4 under LOD shows 
the phrases grouped by type, and the format of the condensed phrases. 
Execution of an END phrase causes control to be passed from REALO 
back to RGPOUT. 
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REMARK 


Purpose 

Print or punch remarks which were stored on disk during 
the input phase of a REPGEN run. 

Calling Sequence 

REMARK is loaded and called from RGPOUT by 

B REMARK 
(normal return) 


Description 


During the input or file generation phase of REPGEN, 
any input records defined as remarks are put into a remarks area on 
the system disk. Remarks normally would be punched into cards, and 
a given remark may not exceed five cards in length. 

If the output medium is punched cards, the REMARK 
processor simply reads back the remarks stored on disk and punches 
them into cards. 

If the output medium is the printer, REMARK prints a 
heading and reads a remark from the disk. The remark is packed into 
a print line and printed. If it overflows to more than one line, 
subsequent lines are indented ten spaces until the entire remark is 
printed. The printer is spaced once, the next remark is read and 
the process is repeated until all remarks have been printed. 


The REMARK routine is called and executed after REALO 
has finished executing an output program. 
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REPEET 


Purpose 

A stored query GETTAC statement is retrieved, expanded 

and executed. 

Calling Sequence 

REPEET is called internally by REPGEN. The call is 
placed in SDA 0003 as 


REPEET ISnNN 

where NNN is the saved statement number assigned by SAVER. REPGEN 
then issues a 


B COPS 
DCW 'REPEET* 

REPEET may be called externally by typing 
REPEET )5NNN 

on the console typewriter. 

Description 


The statement number is validity checked. The saved 
statement SDA table is read in from disk and the SDA corresponding 
to the given statement number is extracted. The saved statement 
is read into core from disk. The statement is scanned for record 
marks. Each record mark is labeled by a record mark number. The 
statement is then typed out and data insertions are made via typewriter 
for each record mark in the statement. The edited statement is 
written to the system communication area and the GETTAC processor 
is called via COPS. 
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REKALL 


Purpose 

Print out all statments previously stored on disk by 
the prograni SAVER. 

Calling Sequence 

Enter REKALL on the console typewriter. Return will 

be to IDLOOP. 

Description 


REKALL reads the saved statement SDA table into core- 
Each non-blank entry points to a saved statement. Each saved state¬ 
ment is read in turn from the disk and is printed along with its 
assigned statement number. A total of 5^0 statements may be saved. 
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DELEET 


Purpose 

Delete from the system disk a Query Language statement 
previously stored there by the SAVER program. 

Calling Sequence 

Enter on the console typewriter 
DELEETJSNNN 

where NNN is the saved statement number assigned by SAVER. 

Description 

The DELEETJSNNN message is retrieved from SDA 0003. 

The 3 character number referencing the statement to be deleted is 
stored. The table of 4 character SDA's which references where each 
saved statement is stored is read into core. The first entry in the 
table references statement number 001, the second entry references 
statement number 002, and so on. Blank entries indicate that 
statement number has not been saved and is available. The statement 
SDA to be deleted is then located. If it is blank, a message will 
be printed on the console indicating that this statement cannot be 
deleted because it has not been saved. If an SDA is found in the 
table entry corresponding to the statement number to be deleted, 
the saved statement is typed out on the l/O typewriter for the 
operator's approval. If okay, the SDA is deleted from the statement 
table and also deallocated so that the statement itself is effectively 
deleted. The new SDA statement table is now rewritten on the disk 
and the program returns to IDLOOP. 


I 

I 
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PRTCRD 


Purpose 

PRTCRD is used to print a report from cards which were 
generated by RPTCRD. 

Calling Sequence 


Enter PRTCRD on the console typewriter. Return will 

be to IDLOOP. 


Description 

The print area is cleared, the printer is spaced to a 
new page, and a card is read. 

Each input card contains half of a print image in 
columns 1-66. Columns 77-80 contain information identifying which 
half of the print image the card represents and any page or line 


spacing to be done before printing, 
as follows: 

Column 77 “ L or )6 
R 

Columns-78-79 = nn 

Column 80 = )4 

1 
* 


Columns 77-80 are interpreted 

; This is left half of print image. 

; This is right half of print image. 

; Number of times to space before 
printing. 

Blank specifies single spacing. 

; Print after putting this card 
in buffer and performing required 
spacing. 

; Same as )4, except skip to new 
page first. 

; Put this card in buffer but do 
not print or space. 


As each card is read, columns 1-66 are placed into 
the left or right half of a print image. If column 80 is a blank 
or 1, required spacing is performed and a line is printed. If 
column 80 is *, no printing or spacing is done, and the next card 
is immediately read. 
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PRTTAP 


Purpose 

PRTTAP is usc'd to print additional copies of a report 
from a REPGEN cxtra-copios tape. 

Calling Sequence 

PRTTAP is called internally from RGPOUT. RGPOUT puts 
PR'J’TAPn 

where n is the number of co|>ies desired, into SDA 0003 and then 
call s 

B COPS 
DCW 'PRTTAP* 

The program can also be called externally by entering 
PRTTAPn 

on the console typewriter. Return will be to IDLOOP. 

Description 


The input to PRTTAP is tape 4, with one file of 135 
character records written in even parity. The first 132 characters 
of each record represent a print image. The last three characters 
of each record contain information regarding page and line spacing 
to be accomplished before printing the image. 

The format of each record is as follows: 

Character 1-’132 ■* Print image. 

133-134 ** Number of times to space before 
printing. 

Blank specifies single spacing 
135 “ Page control. 

1 means skip to new page before 
printing; blank means do not skip. 

PRTTAP reads a record and first examines the page 
control character. If it is a 1, a skip to channel 1 is executed. 
Next, if any spacing is indicated it is accomplished by printing the 
appropriate number of blank lines. The line is then printed. When 
an end-of-file is encountered, the tape is rewound, and the number 
of copies is decremented by one. If it is not blank, another run 
is made through the tape. 
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RPTCRD 


Purpose 


RPTCRD is used to punch cards from a REPGEN extra¬ 
copies tape in a format which will allow the cards to be processed 
by PRTCRD. 

Calling Sequence 

Enter RPTCRD on the console typewriter. Return will 

be to IDLOOP. 

Description 


Input to RPTCRD is tape A, with one file of 135 
character records written in even parity. 

Each input record from tape A is treated as a print 
line, where the first 132 characters constitute a print image, and 
the last three characters are for carriage control. (See write-up 
of PRTTAP for discussion of the carriage control characters.) 

RPTCRD will divide each print image into a left and 
right half, and punch each half into the first 66 columns of a card 
using columns 77-80 of the cards for carriage control information. 
These cards are in proper format to be processed by PRTCRD, which will 
use these cards to generate a report on the printer. If Sense 
Switch C is on, each card will be printed as well as punched. 

The format of the output cards and the meaning of the 
data entered in columns 77-80 is the same as that which was presented 
in section 6.18.3 to describe the input cards to PRTCRD. 

When an end-of-file is encountered on tape A, two blank 
cards are punched and control returns to IDLOOP. 
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